home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Know Your Hockey - The Greatest Player Resource
/
Know Your Hockey: The Greatest Player Resource.iso
/
hockey
/
director
/
ktgcst.cst
/
00007_Script_Banner Modifier scripts
< prev
next >
Wrap
Text File
|
1998-09-28
|
2KB
|
115 lines
global gPop
--resets the button state when the popups are toggled off
on popmenu
resetbanner
updatestage
initpopMenu("pop",280,184,161,204,"pop")
end
on popmenuKTG
resetbanner
updatestage
if gpop <> [] then set mywindow = getat(gpop,1)
if mywindow = (window "Pop") then
setat(gButtonstate,the clickon,0)
set one = the membernum of sprite the clickon
set the membernum of sprite the clickon = one -1
updatestage
end if
initpopMenu("pop",280,184,163,204,"pop")
end
on popmenuRules1
resetbanner
updatestage
if gpop <> [] then set mywindow = getat(gpop,1)
if mywindow = (window "Pop") then
setat(gButtonstate,the clickon,0)
set one = the membernum of sprite the clickon
set the membernum of sprite the clickon = one -1
updatestage
end if
initpopMenu("pop",300,45,134,162,"pop")
end
on popmenuRules2
resetbanner
updatestage
if gpop <> [] then set mywindow = getat(gpop,1)
if mywindow = (window "Pop") then
setat(gButtonstate,the clickon,0)
set one = the membernum of sprite the clickon
set the membernum of sprite the clickon = one -1
updatestage
end if
initpopMenu("pop",315,210,134,162,"pop")
end
on helpbutton
puppetsound 0
resetbanner
losepop(window "pop")
updatestage
starthelp(the clickon)
end
on helpbuttonBTG
stoponly
puppetsound 0
resetbanner
losepop(window "pop")
updatestage
starthelp(the clickon)
end
on popmenuBTG
resetbanner
updatestage
if gpop <> [] then set mywindow = getat(gpop,1)
if mywindow = (window "Pop") then
setat(gButtonstate,the clickon,0)
set one = the membernum of sprite the clickon
set the membernum of sprite the clickon = one -1
updatestage
end if
initpopMenu("pop",26,240,134,162,"pop")
end
global gwhat1, gwhat2,dlflag
on teamplaydef
set dlflag = 1
puppetsound 0
losepop
resetbanner
threestatebutton
updatestage
setdefaultscreen(43)
set gwhat1 = "!offence.dat"
set gwhat2 = "bkg_play.bmp"
play movie "DL"
end
on teamplayAtt
set dlflag = 1
puppetsound 0
losepop
resetbanner
threestatebutton
updatestage
setdefaultscreen(43)
set gwhat1 = "defence.dat;!offence.dat"
set gwhat2 = "bkg_play.bmp"
play movie "DL"
end
on MainExit
resetbanner
threestatebutton
tell the stage to initpopmenu("exitM",200,240,137,168,"exitM")
end